home *** CD-ROM | disk | FTP | other *** search
/ CDV Software Presents (USA) / CDV Software Presents (USA).bin / demo / bk_demo.exe / DATA.PAK / ui / mission_screen.lua < prev    next >
Encoding:
Text File  |  2002-12-20  |  5.0 KB  |  217 lines
  1. bShowEscape = 0 
  2. bShowHelp = 0
  3. bShowObjectives = 0
  4. bShowSingleObjective = 0
  5. --bShowSB = 0
  6. bPause = 0
  7. bShowWin = 0
  8. bShowLose = 0
  9.  
  10. function LuaLoad( ... )
  11.     OutputValue( "agrumentov", arg.n );
  12.  
  13.     if ( arg.n < 2 ) then
  14.         return
  15.     end
  16.     bShowEscape = arg[2]
  17.  
  18.     if ( arg.n < 4 ) then
  19.         return
  20.     end
  21.     bShowHelp = arg[4]
  22.  
  23.     if ( arg.n < 6 ) then
  24.         return
  25.     end
  26.     bShowObjectives = arg[6]
  27.  
  28.     if ( arg.n < 8 ) then
  29.         return
  30.     end
  31. --    bShowSB = arg[8]
  32.  
  33.     if ( arg.n < 10 ) then
  34.         return
  35.     end
  36.     bPause = arg[10]
  37.  
  38.     if ( arg.n < 12 ) then
  39.         return
  40.     end
  41.     bShowSingleObjective = arg[12]
  42.  
  43.     if ( arg.n < 14 ) then
  44.         return
  45.     end
  46.     bShowWin = arg[14]
  47.  
  48.     if ( arg.n < 16 ) then
  49.         return
  50.     end
  51.     bShowLose = arg[16]
  52. end
  53.  
  54. function LuaSave()
  55.     SaveLuaValue( 1, bShowEscape )
  56.     SaveLuaValue( 2, bShowHelp )
  57.     SaveLuaValue( 3, bShowObjectives )
  58. --    SaveLuaValue( 4, bShowSB )
  59.     SaveLuaValue( 5, bPause )
  60.     SaveLuaValue( 6, bShowSingleObjective )
  61.     SaveLuaValue( 7, bShowWin )
  62.     SaveLuaValue( 8, bShowLose )
  63. end
  64.  
  65. function LuaProcessMessage( nMessageCode, nFirst, nSecond )
  66.  
  67.  
  68.     local nTemp = ProcessMessageWithLink( nMessageCode, nFirst );
  69.     if ( nTemp ~= 0 ) then
  70.         return 1
  71.     end
  72.  
  73.     if ( nMessageCode == 2097233 ) then        --ENTER
  74. --        if ( bSendAllies == 1 ) then
  75. --            bSendAllies = 0
  76. --            return 1
  77. --        end
  78.  
  79.         if ( bShowEscape == 1 ) then
  80.             return 1
  81.         end
  82.  
  83. --        OutputValue( "all msg", 1 )
  84.         local nMessageCode = SetProcessedFlag( 2097233 )
  85.         AddMessage( nMessageCode, 0, 0 )        --ENTER CHAT MODE
  86.         return 1
  87.     end
  88.  
  89.     if ( nMessageCode == 2097234 ) then        --CTRL + ENTER
  90. --        OutputValue( "allies msg", 1 )
  91.         local nMessageCode = SetProcessedFlag( 2097234 )
  92.         AddMessage( nMessageCode, 0, 0 )        --ENTER ALLIED CHAT MODE
  93.         return 1
  94.     end
  95.  
  96.     if ( nMessageCode == 2097254 and bShowEscape == 0 ) then    --F1, SHOW HELP WINDOW
  97.         local bShow = 0
  98.  
  99.         if ( bShow == 0 ) then
  100.             local nMessageCode = SetProcessedFlag( 1048593 )
  101.             AddMessage( nMessageCode, 0, 0 )        --PAUSE_GAME
  102.             bPause = 1
  103.         end
  104.  
  105.         bShowHelp = 1
  106.         AddMessage( 65552, 3000, bShowHelp )    --SHOW_WINDOW HELP DIALOG
  107.         AddMessage( 65584, 3000, 1 )        --SET MODAL FLAG
  108.  
  109.         return 1
  110.     end
  111.  
  112.     if ( nMessageCode == 2097255 ) then    --HIDE HELP WINDOW
  113.         bShowHelp = 0
  114.         AddMessage( 65552, 3000, bShowHelp )    --SHOW_WINDOW HELP
  115.         AddMessage( 65584, 3000, 0 )        --REMOVE MODAL FLAG
  116.  
  117.         local nMessageCode = SetProcessedFlag( 1048594 )
  118.         AddMessage( nMessageCode, 0, 0 )        --UNPAUSE_GAME
  119.         bPause = 0
  120.  
  121.         return 1
  122.     end
  123.  
  124.     if ( nMessageCode == 2097248 and bShowHelp == 1 ) then    --ESC
  125.         bShowHelp = 0
  126.         AddMessage( 65552, 3000, bShowHelp )        --SHOW_WINDOW HELP
  127.         AddMessage( 65584, 3000, 0 )        --REMOVE MODAL FLAG
  128.  
  129.         local nMessageCode = SetProcessedFlag( 1048594 )
  130.         AddMessage( nMessageCode, 0, 0 )        --UNPAUSE_GAME
  131.         bPause = 0
  132.  
  133.         return 1
  134.     end
  135.  
  136.     if ( nMessageCode == 2097265 ) then                --HIDE ESC WITHOUT UNPAUSE
  137.         bShowEscape = 0
  138.         AddMessage( 65552, 2000, bShowEscape )    --SHOW_WINDOW
  139.         AddMessage( 65584, 2000, bShowEscape )    --CHANGE MODAL FLAG
  140.         bPause = bShowEscape
  141.  
  142.         return 1
  143.     end
  144.  
  145.     if ( nMessageCode == 2097257 ) then                --SHOW_OBJECTIVES
  146.         local bShow = 0
  147.         if ( bShowHelp ~= 0 ) then
  148.             bShow = 1
  149.             bShowHelp = 0
  150.             AddMessage( 65552, 3000, bShowHelp )    --SHOW_WINDOW HELP
  151.             AddMessage( 65584, 3000, 0 )        --REMOVE MODAL FLAG
  152.         end
  153.  
  154.         if ( bShow == 0 ) then
  155.             local nMessageCode = SetProcessedFlag( 1048593 )
  156.             AddMessage( nMessageCode, 0, 0 )        --PAUSE_GAME
  157.             bPause = 1
  158.         end
  159.  
  160.         bShowEscape = 0
  161.         AddMessage( 65552, 2000, bShowEscape )            --SHOW_WINDOW (HIDE)
  162.  
  163.     end
  164.  
  165.     if ( nMessageCode == 2097266 ) then                --SHOW_SINGLE_OBJECTIVE
  166.         local bShow = 0
  167.         if ( bShowHelp ~= 0 ) then
  168.             bShow = 1
  169.             bShowHelp = 0
  170.             AddMessage( 65552, 3000, bShowHelp )    --SHOW_WINDOW HELP
  171.             AddMessage( 65584, 3000, 0 )        --REMOVE MODAL FLAG
  172.         end
  173.  
  174.         bShowEscape = 0
  175.         AddMessage( 65552, 2000, bShowEscape )            --SHOW_WINDOW (HIDE)
  176.  
  177.     end
  178.  
  179. --ANIMATED STATUS BAR BEGIN
  180.     if ( nMessageCode == 536936448 and nFirst == 110 ) then    --STATE_CHANGED
  181.         if ( nSecond == 1 ) then
  182.             AddMessage( 65568, 40000, 0 )    --ENABLE WINDOW (disable)
  183.             AddMessage( 65552, 40000, 2 )    --SHOW_WINDOW UI_SW_LAST
  184.             SetUserProfileVar( "Mission.UnitExtendedInfo.opened", 1 );
  185.             return 1
  186.         else
  187.             AddMessage( 65568, 40000, 0 )    --ENABLE WINDOW (disable)
  188.             AddMessage( 65552, 40000, 0 )    --SHOW_WINDOW UI_SW_HIDE
  189.             SetUserProfileVar( "Mission.UnitExtendedInfo.opened", 0 );
  190.             return 1
  191.         end
  192.     end
  193.  
  194. --    if ( nMessageCode == 268435458 ) then        --FAKE SB button pressed
  195. --        AddMessage( 65536, 110, 0 )    --SET STATE 0
  196. --        return 1
  197. --    end
  198.  
  199. --    if ( nMessageCode == 2097264 ) then            --SHOW_STATUS_BAR from keyboard
  200. --        local nShowSB = GetUserProfileVar( "Mission.UnitExtendedInfo.opened", 1 )
  201. --        if ( bShowSB == 0 ) then
  202. --            AddMessage( 65536, 110, 1 )    --SET STATE 1
  203. --        else
  204. --            AddMessage( 65536, 110, 0 )    --SET STATE 0
  205. --        end
  206. --        return 1
  207. --    end
  208.  
  209.     if ( nMessageCode == 536936464 and nFirst == 40000 ) then    --ANIMATION_FINISHED
  210.         AddMessage( 65568, 40000, 1 )
  211.         return 1
  212.     end
  213. --ANIMATED STATUS BAR END
  214.  
  215.     return 0
  216. end
  217.